home *** CD-ROM | disk | FTP | other *** search
/ HyperLib 1997 Winter - Disc 1 / HYPERLIB-1997-Winter-CD1.ISO.7z / HYPERLIB-1997-Winter-CD1.ISO / オンラインウェア / GAME / RoboWar 4.1.1.sit / RoboWar 4.1.1 / Tournament III / Team / -Knuckles- next >
Text File  |  1991-07-09  |  10KB  |  417 lines
  1. ##############################################
  2. #   -Knuckles-               v2.8 
  3. #    (Brass)
  4. # by John Baylis
  5. # created 6/24/91
  6. ##############################################
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  
  13.  
  14.       #[][][][][][][][][][][][][][][]#
  15.       # Section One - Kill Floaters  #
  16.       #[][][][][][][][][][][][][][][]#
  17.  
  18.  
  19.  
  20.  
  21.  
  22. #  Click on bar, No need for arrows! ===---->>
  23. #                                      ^
  24. #                               (Not an Arrow)
  25. #                           (Just a "Pointer")
  26.  
  27. ##############################################
  28. #  Calculating Starting Direction and Aim.   #
  29. ##############################################
  30.  
  31. Start: Y 150 > , X 150 > AND WestWallMove IF
  32.  
  33. Top: 0 Q' STO        #Lap Counter
  34.      0 T' STO        #Length Counter
  35.  
  36. CheckStartingLocX:  X 150 < PosX IF
  37.  
  38. NegX: -1 SpeedX' STO
  39.       -5 E' STO
  40.       CheckStartingLocY JUMP
  41.  
  42. PosX: drop
  43.       5 E' STO
  44.       1 SpeedX' STO
  45.  
  46. CheckStartingLocY:  Y 150 < PosY IF
  47.  
  48. NegY:  -8 SpeedY' STO  North JUMP
  49.  
  50. PosY:   8 SpeedY' STO  drop
  51.  
  52.  
  53. ##############################################
  54. #           Southward Instructions           #
  55. ##############################################
  56.  
  57. South:  ICON2   E 180 + Aim' STO
  58.  
  59. SouthLoop:
  60.     Y 275 > ChangeDirS-N IF
  61.     Collision SouthEncounter IF
  62.     Y 275 > ChangeDirS-N IF
  63.     Collision SouthEncounter IF
  64.     Y 275 > ChangeDirS-N IF
  65.     Collision SouthEncounter IF
  66.     Y 275 > ChangeDirS-N IF
  67.     Collision SouthEncounter IF
  68.     Y 275 > ChangeDirS-N IF
  69.     Collision SouthEncounter IF SouthLoop JUMP
  70.  
  71. SouthEncounter:   Range Punch IF
  72.     145 Aim' STO  Range Punch IF
  73.     215 Aim' STO  Range Punch IF
  74.     105 Aim' STO  Range Punch IF
  75.     255 Aim' STO  Range Punch IF
  76.     65 Aim' STO   Range Punch IF
  77.     295 Aim' STO  Range Punch IF  RETURN
  78.  
  79. ##############################################
  80. # Changing Direction & Checking Wall - South #
  81. ##############################################
  82.  
  83. ChangeDirS-N:
  84.     drop
  85.     -8 SpeedY' STO
  86.     X 250 < , SpeedX 1 + AND    WallCheck-S IF
  87.     X 50 > , SpeedX CHS 1 + AND WallCheck-S IF
  88.     SpeedX CHS SpeedX' STO
  89.     E CHS E' STO E
  90.  
  91. WallCheck-S:
  92.     drop
  93.     267 Aim' STO  Range Wallwalk-S IF
  94.     93 Aim' STO   Range Wallwalk-S IF
  95.     T 10 > , X 80 > AND WestWallMove IF
  96.     T 2 + T' STO
  97.     North JUMP
  98.  
  99. Wallwalk-S:
  100.     Energy 100 < Exit IF
  101.     X 80 > WestWallMove IF
  102.     RETURN
  103.  
  104.  
  105. ##############################################
  106. #           Northward Instructions           #
  107. ##############################################
  108.  
  109. North:  ICON0   E Aim' STO 
  110.  
  111. NorthLoop:
  112.     Y 25 < ChangeDirN-S IF
  113.     Collision NorthEncounter IF
  114.     Y 25 < ChangeDirN-S IF
  115.     Collision NorthEncounter IF
  116.     Y 25 < ChangeDirN-S IF
  117.     Collision NorthEncounter IF
  118.     Y 25 < ChangeDirN-S IF
  119.     Collision NorthEncounter IF
  120.     Y 25 < ChangeDirN-S IF
  121.     Collision NorthEncounter IF NorthLoop JUMP
  122.  
  123. NorthEncounter:   Range Punch IF
  124.     325 Aim' STO  Range Punch IF
  125.     35 Aim' STO   Range Punch IF
  126.     285 Aim' STO  Range Punch IF
  127.     75 Aim' STO   Range Punch IF
  128.     245 Aim' STO  Range Punch IF
  129.     115 Aim' STO  Range Punch IF  RETURN
  130.  
  131. ##############################################
  132. # Changing Direction & Checking Wall - North #
  133. ##############################################
  134.  
  135. ChangeDirN-S:
  136.     drop
  137.     8 SpeedY' STO
  138.     X 250 < , SpeedX 1 + AND    WallCheck-N IF
  139.     X 50 > , SpeedX CHS 1 + AND WallCheck-N IF
  140.     SpeedX CHS SpeedX' STO
  141.     E CHS E' STO E
  142.  
  143. WallCheck-N:
  144.     drop
  145.     273 Aim' STO  Range Wallwalk-N IF
  146.     87 Aim' STO   Range Wallwalk-N IF
  147.     T 10 > , X 220 < AND EastWallMove IF
  148.     South JUMP
  149.  
  150. Wallwalk-N:
  151.     Energy 100 < Exit IF
  152.     X 220 < EastWallMove IF
  153.     RETURN
  154.  
  155.  
  156.  
  157. ##############################################
  158. #            General Instructions            #
  159. ##############################################
  160.  
  161. Punch:
  162.     150 Bullet' STO
  163.     drop
  164.     RETURN
  165.  
  166. CornerPunch:
  167.     150 Bullet' STO
  168.     RETURN
  169.  
  170. Exit:
  171.     drop
  172.     RETURN
  173.  
  174.  
  175.  
  176.  
  177.  
  178.  
  179.  
  180.  
  181.  
  182.  
  183. ##############################################
  184.  
  185.  
  186.  
  187.  
  188.  
  189.  
  190.  
  191.  
  192.  
  193.  
  194.       #[][][][][][][][][][][][][][][][]#
  195.       # Section Two - Hunt Wallbangers #
  196.       #[][][][][][][][][][][][][][][][]#
  197.  
  198.  
  199.  
  200.  
  201.  
  202.  
  203.  
  204.  
  205.  
  206.  
  207.  
  208.  
  209. ##############################################
  210. #    Westward Wall Movement & Collisions     #
  211. ##############################################
  212.  
  213. WestWallMove:  drop  ICON4
  214.     265 Aim' STO
  215.     0 SpeedY' STO
  216.     -11 SpeedX' STO
  217.  
  218. Westward:
  219.     X 80 < West-NorthWallMove IF
  220.     Collision WestwardEnc IF
  221.     X 80 < West-NorthWallMove IF
  222.     Collision WestwardEnc IF
  223.     X 80 < West-NorthWallMove IF
  224.     Collision WestwardEnc IF
  225.     X 80 < West-NorthWallMove IF
  226.     Collision WestwardEnc IF
  227.     Westward JUMP
  228.  
  229. WestwardEnc:      Range Punch IF
  230.     230 Aim' STO  Range Punch IF
  231.     305 Aim' STO  Range Punch IF
  232.     190 Aim' STO  Range Punch IF
  233.     345 Aim' STO  Range Punch IF   RETURN
  234.  
  235. ##############################################
  236. #  West to North Wall Movement & Collisions  #
  237. ##############################################
  238.  
  239. West-NorthWallMove:  drop  ICON0
  240.     93 Aim' STO  1 Bullet' STO  225 Aim' STO
  241.     -3 SpeedY' STO
  242.     -5 SpeedX' STO
  243.  
  244. West-Northward:
  245.     X 35 < NorthWallMove IF
  246.     Collision West-NorthwardEnc IF
  247.     X 35 < NorthWallMove IF
  248.     Collision West-NorthwardEnc IF
  249.     Range CornerPunch IF
  250.     X 35 < NorthWallMove IF
  251.     Collision West-NorthwardEnc IF
  252.     West-Northward JUMP
  253.  
  254. West-NorthwardEnc: Range Punch IF
  255.     315 Aim' STO   Range Punch IF
  256.     350 Aim' STO   Range Punch IF
  257.     280 Aim' STO   Range Punch IF
  258.     30 Aim' STO    Range Punch IF
  259.     280 Aim' STO   Range Punch IF   RETURN
  260.  
  261. ##############################################
  262. #    Northward Wall Movement & Collisions    #
  263. ##############################################
  264.  
  265. NorthWallMove:  drop  ICON0
  266.     355 Aim' STO
  267.     0 SpeedX' STO
  268.     -11 SpeedY' STO
  269.  
  270. Northward:
  271.     Y 80 < North-EastWallMove IF
  272.     Collision NorthwardEnc IF
  273.     Y 80 < North-EastWallMove IF
  274.     Collision NorthwardEnc IF
  275.     Y 80 < North-EastWallMove IF
  276.     Collision NorthwardEnc IF
  277.     Y 80 < North-EastWallMove IF
  278.     Collision NorthwardEnc IF
  279.     Northward JUMP
  280.  
  281. NorthwardEnc:     Range Punch IF
  282.     320 Aim' STO  Range Punch IF
  283.     30 Aim' STO   Range Punch IF
  284.     280 Aim' STO  Range Punch IF
  285.     70 Aim' STO   Range Punch IF   RETURN
  286.  
  287. ##############################################
  288. # North-Eastward Wall Movement & Collisions  #
  289. ##############################################
  290.  
  291. North-EastWallMove:  drop  ICON6
  292.     183 Aim' STO  1 Bullet' STO  315 Aim' STO
  293.     3 SpeedX' STO
  294.     -5 SpeedY' STO
  295.  
  296. North-Eastward:
  297.     Y 35 < EastWallMove IF
  298.     Collision North-EastwardEnc IF
  299.     Y 35 < EastWallMove IF
  300.     Collision North-EastwardEnc IF
  301.     Range CornerPunch IF
  302.     Y 35 < EastWallMove IF
  303.     Collision North-EastwardEnc IF
  304.     North-Eastward JUMP
  305.  
  306. North-EastwardEnc: Range Punch IF
  307.     45 Aim' STO    Range Punch IF
  308.     70 Aim' STO    Range Punch IF
  309.     10 Aim' STO    Range Punch IF
  310.     110 Aim' STO   Range Punch IF
  311.     330 Aim' STO   Range Punch IF   RETURN
  312.  
  313. ##############################################
  314. #    Eastward Wall Movement & Collisions     #
  315. ##############################################
  316.  
  317. EastWallMove:  drop  ICON6
  318.     85 Aim' STO
  319.     0 SpeedY' STO
  320.     11 SpeedX' STO
  321.  
  322. Eastward:
  323.     X 220 > East-SouthWallMove IF
  324.     Collision EastwardEnc IF
  325.     X 220 > East-SouthWallMove IF
  326.     Collision EastwardEnc IF
  327.     X 220 > East-SouthWallMove IF
  328.     Collision EastwardEnc IF
  329.     X 220 > East-SouthWallMove IF
  330.     Collision EastwardEnc IF
  331.     Eastward JUMP
  332.  
  333. EastwardEnc:      Range Punch IF
  334.     50 Aim' STO   Range Punch IF
  335.     120 Aim' STO  Range Punch IF
  336.     10 Aim' STO   Range Punch IF
  337.     160 Aim' STO  Range Punch IF   RETURN
  338.  
  339. ##############################################
  340. # East-Southward Wall Movement & Collisions  #
  341. ##############################################
  342.  
  343. East-SouthWallMove:  drop  ICON2  
  344.     Q 3 > , Energy 80 <  OR Top IF
  345.     273 Aim' STO  1 Bullet' STO  45 Aim' STO
  346.     3 SpeedY' STO 5 SpeedX' STO
  347.  
  348. East-Southward:
  349.     X 265 > SouthWallMove IF
  350.     Collision East-SouthwardEnc IF
  351.     X 265 > SouthWallMove IF
  352.     Collision East-SouthwardEnc IF
  353.     Range CornerPunch IF
  354.     X 265 > SouthWallMove IF
  355.     Collision East-SouthwardEnc IF
  356.     East-Southward JUMP
  357.  
  358. East-SouthwardEnc: Range Punch IF
  359.     135 Aim' STO   Range Punch IF
  360.     100 Aim' STO   Range Punch IF
  361.     170 Aim' STO   Range Punch IF
  362.     60 Aim' STO    Range Punch IF
  363.     210 Aim' STO   Range Punch IF   RETURN
  364.  
  365. ##############################################
  366. #    Southward Wall Movement & Collisions    #
  367. ##############################################
  368.  
  369. SouthWallMove:  drop  ICON2    Q 1 + Q' STO
  370.     175 Aim' STO
  371.     0 SpeedX' STO
  372.     11 SpeedY' STO
  373.  
  374. Southward:
  375.     Y 220 > South-WestWallMove IF
  376.     Collision SouthwardEnc IF
  377.     Y 220 > South-WestWallMove IF
  378.     Collision SouthwardEnc IF
  379.     Y 220 > South-WestWallMove IF
  380.     Collision SouthwardEnc IF
  381.     Y 220 > South-WestWallMove IF
  382.     Collision SouthwardEnc IF
  383.     Southward JUMP
  384.  
  385. SouthwardEnc:     Range Punch IF
  386.     140 Aim' STO  Range Punch IF
  387.     210 Aim' STO  Range Punch IF
  388.     100 Aim' STO  Range Punch IF
  389.     250 Aim' STO  Range Punch IF   RETURN
  390.  
  391. ##############################################
  392. # South-Westward Wall Movement & Collisions  #
  393. ##############################################
  394.  
  395. South-WestWallMove:  drop  ICON4
  396.     3 Aim' STO  1 Bullet' STO  135 Aim' STO
  397.     -3 SpeedX' STO
  398.     5 SpeedY' STO
  399.  
  400. South-Westward:
  401.     Y 265 > WestWallMove IF
  402.     Collision South-WestwardEnc IF
  403.     Y 265 > WestWallMove IF
  404.     Collision South-WestwardEnc IF
  405.     Range CornerPunch IF
  406.     Y 265 > WestWallMove IF
  407.     Collision South-WestwardEnc IF
  408.     South-Westward JUMP
  409.  
  410. South-WestwardEnc: Range Punch IF
  411.     225 Aim' STO   Range Punch IF
  412.     260 Aim' STO   Range Punch IF
  413.     190 Aim' STO   Range Punch IF
  414.     300 Aim' STO   Range Punch IF
  415.     150 Aim' STO   Range Punch IF   RETURN
  416.  
  417. ##############################################